www.gusucode.com > 地方成人教育中心整站源代码 1 > 地方成人教育中心整站源代码 1.0/yspyShow.asp
<!--#include file="inc/conn.asp"--> <!--#include file="inc/sqlin.asp"--> <% if request.QueryString("ID")="" then sql="Select top 1 * from Idea_News03 where IsShow="&GetState()&" order by ID desc" else if not IsNumeric(request.QueryString("ID")) then response.Write "<script>alert('参数错误!');history.go(-1);</script>" response.End() else sql="Select * from Idea_News03 where ID="&request.QueryString("ID")&"" end if end if set rs=idea.exec(sql,1) if not rs.eof then IndexTemplateHtml=Replace(FSOFileRead("template/"&idea_3&"/html/yspyshow.html"),"{template_head}",FSOFileRead("template/"&idea_3&"/html/head.html")) IndexTemplateHtml=Replace(IndexTemplateHtml,"{template_foot}",FSOFileRead("template/"&idea_3&"/html/foot.html")) IndexTemplateHtml=replace(IndexTemplateHtml,"images/","template/"&idea_3&"/images/") IndexTemplateHtml=Replace(IndexTemplateHtml,"{news_name}",rs("NewsName")) IndexTemplateHtml=Replace(IndexTemplateHtml,"{news_source}",rs("Source")) IndexTemplateHtml=Replace(IndexTemplateHtml,"{news_publisher}",rs("Publisher")) IndexTemplateHtml=Replace(IndexTemplateHtml,"{news_adddate}",rs("AddDate")) IndexTemplateHtml=Replace(IndexTemplateHtml,"{news_content}",rs("Content")) Title=rs("NewsName") else response.Write "<script>alert('数字不在接受范围!');history.go(-1);</script>" response.End() end if rs.close set rs=nothing IndexTemplateHtml= Replace(IndexTemplateHtml,"{idea_title}",Title) AllTemplateHtml=ReplaceGlobalLable(GetAllHtml(IndexTemplateHtml,Const_Rule)) response.write AllTemplateHtml %>